	MODULE MODA_USRTMP

#ifndef MAXJL_H
#define MAXJL_H
	  USE MODV_MAXJL
#endif

	  PARAMETER ( MAXRCR = 100 )
#ifdef DYNAMIC_ALLOCATION
	  INTEGER, ALLOCATABLE :: IUTMP(:,:)
	  REAL*8, ALLOCATABLE :: VUTMP(:,:)
#else
	  INTEGER :: IUTMP(MAXJL,MAXRCR)
	  REAL*8 :: VUTMP(MAXJL,MAXRCR)
#endif

	END MODULE
